home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Software Dispatch
/
Apple Software Dispatch.iso
/
Software Dispatch Files
/
Resolve
/
Sample Application
/
Sample Application.rsrc
/
CODE_24_ROTATE.txt
< prev
next >
Wrap
Text File
|
1993-07-15
|
25KB
|
442 lines
# near model CODE resource
# jump table entries: 9200-9200 (1 of them)
export_1150:
00000000 4E56 FFBA link A6, -0x0046
00000004 48E7 0F18 movem.l -[A7], D4,D5,D6,D7,A3,A4
00000008 4AAE 000C tst.l [A6 + 0xC]
0000000C 6700 049C beq +0x49E /* 000004AA */
00000010 206E 000C movea.l A0, [A6 + 0xC]
00000014 4A10 tst.b [A0]
00000016 6700 0492 beq +0x494 /* 000004AA */
0000001A 206D E9DE movea.l A0, [A5 - 0x1622]
0000001E 4A68 00E6 tst.w [A0 + 0xE6]
00000022 6700 00C6 beq +0xC8 /* 000000EA */
00000026 206D E9DE movea.l A0, [A5 - 0x1622]
0000002A 2068 001C movea.l A0, [A0 + 0x1C]
0000002E 2050 movea.l A0, [A0]
00000030 3F28 0008 move.w -[A7], [A0 + 0x8]
00000034 206D E9DE movea.l A0, [A5 - 0x1622]
00000038 2068 001C movea.l A0, [A0 + 0x1C]
0000003C 2050 movea.l A0, [A0]
0000003E 3F28 0006 move.w -[A7], [A0 + 0x6]
00000042 A893 syscall MoveTo
00000044 7020 moveq.l D0, 0x20
00000046 3F00 move.w -[A7], D0
00000048 A883 syscall DrawChar
0000004A 4EAD 09AA jsr [A5 + 0x9AA /* export_305 */]
0000004E 302E 0012 move.w D0, [A6 + 0x12]
00000052 0800 0000 btst.b D0, 0x0
00000056 6708 beq +0xA /* 00000060 */
00000058 1D7C 0002 FFBE move.b [A6 - 0x42], 0x2
0000005E 6014 bra +0x16 /* 00000074 */
label00000060:
00000060 7002 moveq.l D0, 0x02
00000062 C06E 0012 and.w D0, [A6 + 0x12]
00000066 6708 beq +0xA /* 00000070 */
00000068 1D7C 0003 FFBE move.b [A6 - 0x42], 0x3
0000006E 6004 bra +0x6 /* 00000074 */
label00000070:
00000070 422E FFBE clr.b [A6 - 0x42]
label00000074:
00000074 422E FFBF clr.b [A6 - 0x41]
00000078 3D7C 010E FFC0 move.w [A6 - 0x40], 0x10E
0000007E 1D7C 0001 FFC2 move.b [A6 - 0x3E], 0x1
00000084 422E FFC3 clr.b [A6 - 0x3D]
00000088 558F subq.l A7, 2
0000008A 486E FFBE pea.l [A6 - 0x42]
0000008E 486E FFBA pea.l [A6 - 0x46]
00000092 7006 moveq.l D0, 0x06
00000094 2F00 move.l -[A7], D0
00000096 4EAD 05C2 jsr [A5 + 0x5C2 /* export_180 */]
0000009A 4A5F tst.w [A7]+
0000009C 6616 bne +0x18 /* 000000B4 */
0000009E 3F3C 0096 move.w -[A7], 0x96
000000A2 7006 moveq.l D0, 0x06
000000A4 3F00 move.w -[A7], D0
000000A6 2F2E FFBA move.l -[A7], [A6 - 0x46]
000000AA A8F2 syscall PicComment
000000AC 2F2E FFBA move.l -[A7], [A6 - 0x46]
000000B0 4EAD 03EA jsr [A5 + 0x3EA /* export_121 */]
label000000B4:
000000B4 7000 moveq.l D0, 0x00
000000B6 2D40 FFC4 move.l [A6 - 0x3C], D0
000000BA 2D40 FFC8 move.l [A6 - 0x38], D0
000000BE 558F subq.l A7, 2
000000C0 486E FFC4 pea.l [A6 - 0x3C]
000000C4 486E FFBA pea.l [A6 - 0x46]
000000C8 7208 moveq.l D1, 0x08
000000CA 2F01 move.l -[A7], D1
000000CC 4EAD 05C2 jsr [A5 + 0x5C2 /* export_180 */]
000000D0 4A5F tst.w [A7]+
000000D2 6616 bne +0x18 /* 000000EA */
000000D4 3F3C 009A move.w -[A7], 0x9A
000000D8 7008 moveq.l D0, 0x08
000000DA 3F00 move.w -[A7], D0
000000DC 2F2E FFBA move.l -[A7], [A6 - 0x46]
000000E0 A8F2 syscall PicComment
000000E2 2F2E FFBA move.l -[A7], [A6 - 0x46]
000000E6 4EAD 03EA jsr [A5 + 0x3EA /* export_121 */]
label000000EA:
000000EA 4A6D A8B4 tst.w [A5 - 0x574C]
000000EE 670A beq +0xC /* 000000FA */
000000F0 486E 0008 pea.l [A6 + 0x8]
000000F4 4EAD 06F2 jsr [A5 + 0x6F2 /* export_218 */]
000000F8 588F addq.l A7, 4
label000000FA:
000000FA 7000 moveq.l D0, 0x00
000000FC 2D40 FFEA move.l [A6 - 0x16], D0
00000100 2D40 FFDC move.l [A6 - 0x24], D0
00000104 286D E9DE movea.l A4, [A5 - 0x1622]
00000108 47ED AAF0 lea.l A3, [A5 - 0x5510]
0000010C 2F0B move.l -[A7], A3
0000010E 4EAD 076A jsr [A5 + 0x76A /* export_233 */]
00000112 382D AC6C move.w D4, [A5 - 0x5394]
00000116 3B6C 017C AC6C move.w [A5 - 0x5394], [A4 + 0x17C]
0000011C 486C 0156 pea.l [A4 + 0x156]
00000120 4EAD 082A jsr [A5 + 0x82A /* export_257 */]
00000124 3B44 AC6C move.w [A5 - 0x5394], D4
00000128 486E FFD4 pea.l [A6 - 0x2C]
0000012C A88B syscall GetFontInfo
0000012E 426E FFE2 clr.w [A6 - 0x1E]
00000132 426E FFE4 clr.w [A6 - 0x1C]
00000136 558F subq.l A7, 2
00000138 2F2E 000C move.l -[A7], [A6 + 0xC]
0000013C A88C syscall StringWidth
0000013E 301F move.w D0, [A7]+
00000140 48C0 ext.l D0
00000142 7200 moveq.l D1, 0x00
00000144 122C 015B move.b D1, [A4 + 0x15B]
00000148 7402 moveq.l D2, 0x02
0000014A C481 and.l D2, D1
0000014C 508F addq.l A7, 8
0000014E 6716 beq +0x18 /* 00000166 */
00000150 322E FFD4 move.w D1, [A6 - 0x2C]
00000154 48C1 ext.l D1
00000156 2F00 move.l -[A7], D0
00000158 2001 move.l D0, D1
0000015A 7202 moveq.l D1, 0x02
0000015C 4EAD 0352 jsr [A5 + 0x352 /* export_102 */]
00000160 2200 move.l D1, D0
00000162 201F move.l D0, [A7]+
00000164 6002 bra +0x4 /* 00000168 */
label00000166:
00000166 7200 moveq.l D1, 0x00
label00000168:
00000168 D280 add.l D1, D0
0000016A 3D41 FFE8 move.w [A6 - 0x18], D1
0000016E 6E06 bgt +0x8 /* 00000176 */
00000170 3D7C 0001 FFE8 move.w [A6 - 0x18], 0x1
label00000176:
00000176 302E FFD6 move.w D0, [A6 - 0x2A]
0000017A D06E FFD4 add.w D0, [A6 - 0x2C]
0000017E 3D40 FFE6 move.w [A6 - 0x1A], D0
00000182 302E FFE8 move.w D0, [A6 - 0x18]
00000186 D07C 000F add.w D0, 0xF
0000018A 48C0 ext.l D0
0000018C E680 asr D0, 3
0000018E 223C 0000 FFFE move.l D1, 0xFFFE
00000194 C280 and.l D1, D0
00000196 3D41 FFE0 move.w [A6 - 0x20], D1
0000019A 302E FFE0 move.w D0, [A6 - 0x20]
0000019E C1EE FFE6 muls.w D0, [A6 - 0x1A]
000001A2 2F00 move.l -[A7], D0
000001A4 4EAD 0CCA jsr [A5 + 0xCCA /* export_405 */]
000001A8 2D40 FFDC move.l [A6 - 0x24], D0
000001AC 588F addq.l A7, 4
000001AE 6700 01E8 beq +0x1EA /* 00000398 */
000001B2 486E FFDC pea.l [A6 - 0x24]
000001B6 A875 syscall SetPBits/SetPortBits
000001B8 2F2B 0018 move.l -[A7], [A3 + 0x18]
000001BC 486E FFE2 pea.l [A6 - 0x1E]
000001C0 A8DF syscall RectRgn
000001C2 486E FFE2 pea.l [A6 - 0x1E]
000001C6 A87B syscall ClipRect
000001C8 7000 moveq.l D0, 0x00
000001CA 3F00 move.w -[A7], D0
000001CC A889 syscall TextMode
000001CE 7000 moveq.l D0, 0x00
000001D0 3F00 move.w -[A7], D0
000001D2 3F2E FFD4 move.w -[A7], [A6 - 0x2C]
000001D6 A893 syscall MoveTo
000001D8 2F2E 000C move.l -[A7], [A6 + 0xC]
000001DC A884 syscall DrawString
000001DE 486D FD02 pea.l [A5 - 0x2FE]
000001E2 A875 syscall SetPBits/SetPortBits
000001E4 7001 moveq.l D0, 0x01
000001E6 3F00 move.w -[A7], D0
000001E8 A889 syscall TextMode
000001EA 2F0C move.l -[A7], A4
000001EC 4EAD 076A jsr [A5 + 0x76A /* export_233 */]
000001F0 705A moveq.l D0, 0x5A
000001F2 B06E 0016 cmp.w D0, [A6 + 0x16]
000001F6 588F addq.l A7, 4
000001F8 6600 013A bne +0x13C /* 00000334 */
000001FC 426E FFF0 clr.w [A6 - 0x10]
00000200 426E FFF2 clr.w [A6 - 0xE]
00000204 3D6E FFE6 FFF6 move.w [A6 - 0xA], [A6 - 0x1A]
0000020A 3D6E FFE8 FFF4 move.w [A6 - 0xC], [A6 - 0x18]
00000210 302E FFF6 move.w D0, [A6 - 0xA]
00000214 D07C 000F add.w D0, 0xF
00000218 48C0 ext.l D0
0000021A E680 asr D0, 3
0000021C 223C 0000 FFFE move.l D1, 0xFFFE
00000222 C280 and.l D1, D0
00000224 3D41 FFEE move.w [A6 - 0x12], D1
00000228 302E FFEE move.w D0, [A6 - 0x12]
0000022C C1EE FFF4 muls.w D0, [A6 - 0xC]
00000230 2F00 move.l -[A7], D0
00000232 4EAD 0CCA jsr [A5 + 0xCCA /* export_405 */]
00000236 2D40 FFEA move.l [A6 - 0x16], D0
0000023A 588F addq.l A7, 4
0000023C 6700 00F6 beq +0xF8 /* 00000334 */
00000240 4245 clr.w D5
00000242 382E FFF4 move.w D4, [A6 - 0xC]
00000246 5344 subq.w D4, 1
00000248 607E bra +0x80 /* 000002C8 */
label0000024A:
0000024A 206E FFDC movea.l A0, [A6 - 0x24]
0000024E 3005 move.w D0, D5
00000250 C1EE FFE0 muls.w D0, [A6 - 0x20]
00000254 47F0 0800 lea.l A3, [A0 + D0]
00000258 4247 clr.w D7
0000025A 6064 bra +0x66 /* 000002C0 */
label0000025C:
0000025C 48C7 ext.l D7
0000025E 2007 move.l D0, D7
00000260 7208 moveq.l D1, 0x08
00000262 4EAD 0362 jsr [A5 + 0x362 /* export_104 */]
00000266 4A80 tst.l D0
00000268 6602 bne +0x4 /* 0000026C */
0000026A 1C1B move.b D6, [A3]+
label0000026C:
0000026C 4A06 tst.b D6
0000026E 6612 bne +0x14 /* 00000282 */
00000270 48C7 ext.l D7
00000272 2007 move.l D0, D7
00000274 7208 moveq.l D1, 0x08
00000276 4EAD 0362 jsr [A5 + 0x362 /* export_104 */]
0000027A 7208 moveq.l D1, 0x08
0000027C 9280 sub.l D1, D0
0000027E DE41 add.w D7, D1
00000280 603E bra +0x40 /* 000002C0 */
label00000282:
00000282 303C 0080 move.w D0, 0x80
00000286 C006 and.b D0, D6
00000288 6732 beq +0x34 /* 000002BC */
0000028A 206E FFEA movea.l A0, [A6 - 0x16]
0000028E 3004 move.w D0, D4
00000290 9047 sub.w D0, D7
00000292 C1EE FFEE muls.w D0, [A6 - 0x12]
00000296 48C5 ext.l D5
00000298 2205 move.l D1, D5
0000029A E681 asr D1, 3
0000029C D280 add.l D1, D0
0000029E 48C5 ext.l D5
000002A0 2F08 move.l -[A7], A0
000002A2 2005 move.l D0, D5
000002A4 2F01 move.l -[A7], D1
000002A6 7208 moveq.l D1, 0x08
000002A8 4EAD 0362 jsr [A5 + 0x362 /* export_104 */]
000002AC 221F move.l D1, [A7]+
000002AE 205F movea.l A0, [A7]+
000002B0 243C 0000 0080 move.l D2, 0x80
000002B6 E0A2 asr D2, D0
000002B8 8530 1800 or.b [A0 + D1], D2
label000002BC:
000002BC 5247 addq.w D7, 1
000002BE E30E lsl D6.b, 1
label000002C0:
000002C0 BE6E FFE8 cmp.w D7, [A6 - 0x18]
000002C4 6D96 blt -0x68 /* 0000025C */
000002C6 5245 addq.w D5, 1
label000002C8:
000002C8 BA6E FFE6 cmp.w D5, [A6 - 0x1A]
000002CC 6D00 FF7C blt -0x82 /* 0000024A */
000002D0 3D6E 000A FFFA move.w [A6 - 0x6], [A6 + 0xA]
000002D6 3D6E 0008 FFF8 move.w [A6 - 0x8], [A6 + 0x8]
000002DC 7003 moveq.l D0, 0x03
000002DE C06E 0012 and.w D0, [A6 + 0x12]
000002E2 671C beq +0x1E /* 00000300 */
000002E4 7002 moveq.l D0, 0x02
000002E6 C06E 0012 and.w D0, [A6 + 0x12]
000002EA 6708 beq +0xA /* 000002F4 */
000002EC 302E FFF4 move.w D0, [A6 - 0xC]
000002F0 48C0 ext.l D0
000002F2 6008 bra +0xA /* 000002FC */
label000002F4:
000002F4 302E FFF4 move.w D0, [A6 - 0xC]
000002F8 48C0 ext.l D0
000002FA E280 asr D0, 1
label000002FC:
000002FC D16E FFF8 add.w [A6 - 0x8], D0
label00000300:
00000300 700C moveq.l D0, 0x0C
00000302 C06E 0012 and.w D0, [A6 + 0x12]
00000306 671C beq +0x1E /* 00000324 */
00000308 7008 moveq.l D0, 0x08
0000030A C06E 0012 and.w D0, [A6 + 0x12]
0000030E 6708 beq +0xA /* 00000318 */
00000310 302E FFD4 move.w D0, [A6 - 0x2C]
00000314 48C0 ext.l D0
00000316 6008 bra +0xA /* 00000320 */
label00000318:
00000318 302E FFD4 move.w D0, [A6 - 0x2C]
0000031C 48C0 ext.l D0
0000031E E280 asr D0, 1
label00000320:
00000320 D16E FFFA add.w [A6 - 0x6], D0
label00000324:
00000324 302E FFD4 move.w D0, [A6 - 0x2C]
00000328 916E FFFA sub.w [A6 - 0x6], D0
0000032C 302E FFE8 move.w D0, [A6 - 0x18]
00000330 916E FFF8 sub.w [A6 - 0x8], D0
label00000334:
00000334 4AAE FFEA tst.l [A6 - 0x16]
00000338 6752 beq +0x54 /* 0000038C */
0000033A 302E FFF6 move.w D0, [A6 - 0xA]
0000033E D06E FFFA add.w D0, [A6 - 0x6]
00000342 3D40 FFFE move.w [A6 - 0x2], D0
00000346 302E FFF4 move.w D0, [A6 - 0xC]
0000034A D06E FFF8 add.w D0, [A6 - 0x8]
0000034E 3D40 FFFC move.w [A6 - 0x4], D0
00000352 4A6D A8C4 tst.w [A5 - 0x573C]
00000356 670C beq +0xE /* 00000364 */
00000358 7000 moveq.l D0, 0x00
0000035A 2F00 move.l -[A7], D0
0000035C 4EAD 080A jsr [A5 + 0x80A /* export_253 */]
00000360 588F addq.l A7, 4
00000362 6004 bra +0x6 /* 00000368 */
label00000364:
00000364 4EAD 09A2 jsr [A5 + 0x9A2 /* export_304 */]
label00000368:
00000368 486E FFEA pea.l [A6 - 0x16]
0000036C 486C 0002 pea.l [A4 + 0x2]
00000370 486E FFF0 pea.l [A6 - 0x10]
00000374 486E FFF8 pea.l [A6 - 0x8]
00000378 7001 moveq.l D0, 0x01
0000037A 3F00 move.w -[A7], D0
0000037C 7200 moveq.l D1, 0x00
0000037E 2F01 move.l -[A7], D1
00000380 A8EC syscall CopyBits
00000382 2F2E FFEA move.l -[A7], [A6 - 0x16]
00000386 4EAD 0062 jsr [A5 + 0x62 /* export_8 */]
0000038A 588F addq.l A7, 4
label0000038C:
0000038C 2F2E FFDC move.l -[A7], [A6 - 0x24]
00000390 4EAD 0062 jsr [A5 + 0x62 /* export_8 */]
00000394 588F addq.l A7, 4
00000396 6008 bra +0xA /* 000003A0 */
label00000398:
00000398 2F0C move.l -[A7], A4
0000039A 4EAD 076A jsr [A5 + 0x76A /* export_233 */]
0000039E 588F addq.l A7, 4
label000003A0:
000003A0 4A6C 00E6 tst.w [A4 + 0xE6]
000003A4 6700 0104 beq +0x106 /* 000004AA */
000003A8 7000 moveq.l D0, 0x00
000003AA 3F00 move.w -[A7], D0
000003AC 3F00 move.w -[A7], D0
000003AE A89B syscall PenSize
000003B0 7000 moveq.l D0, 0x00
000003B2 3F00 move.w -[A7], D0
000003B4 3F00 move.w -[A7], D0
000003B6 A893 syscall MoveTo
000003B8 7001 moveq.l D0, 0x01
000003BA 3F00 move.w -[A7], D0
000003BC 3F00 move.w -[A7], D0
000003BE A891 syscall LineTo
000003C0 70FF moveq.l D0, 0xFFFFFFFF
000003C2 1F00 move.b -[A7], D0
000003C4 4EAD 0612 jsr [A5 + 0x612 /* export_190 */]
000003C8 397C FFFF 0102 move.w [A4 + 0x102], 0xFFFF
000003CE 486C 0156 pea.l [A4 + 0x156]
000003D2 4EAD 082A jsr [A5 + 0x82A /* export_257 */]
000003D6 382D A8B4 move.w D4, [A5 - 0x574C]
000003DA 426D A8B4 clr.w [A5 - 0x574C]
000003DE 7003 moveq.l D0, 0x03
000003E0 C06E 0012 and.w D0, [A6 + 0x12]
000003E4 588F addq.l A7, 4
000003E6 6720 beq +0x22 /* 00000408 */
000003E8 558F subq.l A7, 2
000003EA 2F2E 000C move.l -[A7], [A6 + 0xC]
000003EE A88C syscall StringWidth
000003F0 301F move.w D0, [A7]+
000003F2 48C0 ext.l D0
000003F4 7202 moveq.l D1, 0x02
000003F6 C26E 0012 and.w D1, [A6 + 0x12]
000003FA 6704 beq +0x6 /* 00000400 */
000003FC 7200 moveq.l D1, 0x00
000003FE 6002 bra +0x4 /* 00000402 */
label00000400:
00000400 7201 moveq.l D1, 0x01
label00000402:
00000402 E2A0 asr D0, D1
00000404 D16E 0008 add.w [A6 + 0x8], D0
label00000408:
00000408 700C moveq.l D0, 0x0C
0000040A C06E 0012 and.w D0, [A6 + 0x12]
0000040E 671A beq +0x1C /* 0000042A */
00000410 4EAD 0792 jsr [A5 + 0x792 /* export_238 */]
00000414 48C0 ext.l D0
00000416 7208 moveq.l D1, 0x08
00000418 C26E 0012 and.w D1, [A6 + 0x12]
0000041C 6704 beq +0x6 /* 00000422 */
0000041E 7200 moveq.l D1, 0x00
00000420 6002 bra +0x4 /* 00000424 */
label00000422:
00000422 7201 moveq.l D1, 0x01
label00000424:
00000424 E2A0 asr D0, D1
00000426 D16E 000A add.w [A6 + 0xA], D0
label0000042A:
0000042A 3B44 A8B4 move.w [A5 - 0x574C], D4
0000042E 598F subq.l A7, 4
00000430 A8D8 syscall NewRgn
00000432 265F movea.l A3, [A7]+
00000434 2F0B move.l -[A7], A3
00000436 A87A syscall GetClip
00000438 558F subq.l A7, 2
0000043A 486E FFF8 pea.l [A6 - 0x8]
0000043E 2053 movea.l A0, [A3]
00000440 4868 0002 pea.l [A0 + 0x2]
00000444 486E FFCC pea.l [A6 - 0x34]
00000448 A8AA syscall SectRect
0000044A 4A1F tst.b [A7]+
0000044C 6722 beq +0x24 /* 00000470 */
0000044E 426E FFD2 clr.w [A6 - 0x2E]
00000452 426E FFD0 clr.w [A6 - 0x30]
00000456 426E FFCE clr.w [A6 - 0x32]
0000045A 426E FFCC clr.w [A6 - 0x34]
0000045E 486E FFCC pea.l [A6 - 0x34]
00000462 A87B syscall ClipRect
00000464 2F2E 0008 move.l -[A7], [A6 + 0x8]
00000468 A893 syscall MoveTo
0000046A 2F2E 000C move.l -[A7], [A6 + 0xC]
0000046E A884 syscall DrawString
label00000470:
00000470 2F0B move.l -[A7], A3
00000472 A879 syscall SetClip
00000474 2F0B move.l -[A7], A3
00000476 A8D9 syscall DisposRgn/DisposeRgn
00000478 7000 moveq.l D0, 0x00
0000047A 1F00 move.b -[A7], D0
0000047C 4EAD 0612 jsr [A5 + 0x612 /* export_190 */]
00000480 206D E9DE movea.l A0, [A5 - 0x1622]
00000484 317C FFFF 0102 move.w [A0 + 0x102], 0xFFFF
0000048A 206D E9DE movea.l A0, [A5 - 0x1622]
0000048E 4868 0156 pea.l [A0 + 0x156]
00000492 4EAD 082A jsr [A5 + 0x82A /* export_257 */]
00000496 3F3C 0097 move.w -[A7], 0x97
0000049A 7000 moveq.l D0, 0x00
0000049C 3F00 move.w -[A7], D0
0000049E 7200 moveq.l D1, 0x00
000004A0 2F01 move.l -[A7], D1
000004A2 A8F2 syscall PicComment
000004A4 4EAD 09B2 jsr [A5 + 0x9B2 /* export_306 */]
000004A8 588F addq.l A7, 4
label000004AA:
000004AA 7001 moveq.l D0, 0x01
000004AC 4CEE 18F0 FFA2 movem.l D4,D5,D6,D7,A3,A4, [A6 - 0x5E]
000004B2 4E5E unlink A6
000004B4 4E75 rts